home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / cmln0786.arc / PILOT2.LTG < prev    next >
Text File  |  1986-04-28  |  640b  |  28 lines
  1.  
  2.                            Listing #2
  3.                         The Main Routine
  4.  
  5. main(argc, argv)
  6. int argc;
  7. char *argv[];
  8. {
  9.     char line[SLEN];    /* input buffer for reading file */
  10.  
  11.     if (argc == 3)
  12.       debug++;
  13.     else if (argc != 2)
  14.       exit(printf("Usage: %s [-d] <filename>\n", argv[0]));
  15.  
  16.     init(argv[argc-1]);          /* open file and such */
  17.  
  18.     while (fgets(line, SLEN, fileid) != NULL) {
  19.       remove_return(line);    
  20.       current_line++;
  21.       if (debug) printf(" %2d > %s\n", current_line, line);
  22.       if (strlen(line) > 0) parse(line);
  23.     }
  24.  
  25.     wrapup();             /* close file and such */
  26. }
  27.  
  28.